home *** CD-ROM | disk | FTP | other *** search
- on vrpanosetup
-
- global vrpano
- -- setup the rendering
- getRendererServices().textureRenderFormat = #rgba8880
-
- -- Trick to avoid seeing the panorama cube's edges on OpenGL rendering
- pano_cube = sprite(vrpano).member.model(1)
- repeat with i=1 to pano_cube.shaderlist.count
- pano_cube.shaderlist[i].texturelist[1].quality = #low
- pano_cube.shaderlist[i].texturelist[1].nearFiltering = TRUE
- end repeat
-
- pano_cube.transform.rotation = vector(0,0,0)
- sprite(vrpano).member.camera(1).WorldPosition = vector(0.0,0.0,0.0)
- sprite(vrpano).member.camera(1).fieldofView = 85
- sprite(vrpano).member.camera(1).transform.rotation = vector(0,0,0)
-
- end
-
-
- on vrpanorotate
- global vrpano
- sprite(vrpano).member.camera(1).rotate(0,.1,0)
-
- end
-